home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 200
- Top = 99
- BorderIcons = []
- BorderStyle = bsSingle
- ClientHeight = 325
- ClientWidth = 427
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poDefaultPosOnly
- WindowState = wsMaximized
- OnCreate = FormCreate
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object LabelHeading: TLabel
- Left = 0
- Top = 41
- Width = 427
- Height = 19
- Align = alTop
- Alignment = taCenter
- Caption = 'Application Title'
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 427
- Height = 41
- Align = alTop
- TabOrder = 0
- object LabelObjectware: TLabel
- Left = 50
- Top = 1
- Width = 376
- Height = 39
- Align = alClient
- Caption = 'Objectware'
- Font.Color = clBlack
- Font.Height = -24
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- end
- object Panel2: TPanel
- Left = 1
- Top = 1
- Width = 49
- Height = 39
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 0
- end
- end
- object PanelContent: TPanel
- Left = 0
- Top = 60
- Width = 427
- Height = 265
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Image1: TImage
- Left = 16
- Top = 9
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image000.ico>}
- Stretch = True
- end
- object LabelDirectory: TLabel
- Left = 24
- Top = 152
- Width = 120
- Height = 16
- Caption = 'Installation Directory'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object MemoRequirements: TMemo
- Left = 56
- Top = 16
- Width = 273
- Height = 105
- TabStop = False
- Lines.Strings = (
- 'This Installation program installs Objectware Cadet, '
- 'Computer Aided Database Engineering Tool.'
- 'System Requirements:'
- 'IBM PC or compatible with 80386 or higher processor.'
- 'Microsoft windows 95'
- '4 MBytes of RAM minimum'
- '6 MBytes of free Harddisk space minimum')
- ReadOnly = True
- TabOrder = 3
- end
- object EditDirectory: TEdit
- Left = 136
- Top = 144
- Width = 145
- Height = 21
- TabOrder = 0
- end
- object MemoCopyRight: TMemo
- Left = 16
- Top = 184
- Width = 433
- Height = 201
- TabStop = False
- Lines.Strings = (
- 'COPYRIGHT:'
-
- 'This Software is owned by Objectware who shall retain all and so' +
- 'le right, title and interest'
-
- 'in and to the Software. Objectware grant you the right to use th' +
- 'e Software only. The'
-
- 'Software is protected by United States copyright law and interna' +
- 'tional treaty provisions.'
-
- 'You agree not to remove any copyright or other product identific' +
- 'ation notices from this'
- 'Software.'
- ''
- 'LIMIT OF LIABILITY'
- 'IN NO EVENT SHALL OBJECTWARE OR ITS SUPPLIERS BE LIABLE FOR ANY'
- 'DAMAGES INCLUDING, WITHOUT LIMITATION, ANY LOST PROFITS, LOST'
- 'SAVINGS OR OTHER INDIRECT, INCIDENTAL, SPECIAL OR CONSEQUENTIAL'
-
- 'DAMAGES ARISING OUT OF THE USE OF OR INABILITY TO USE SUCH SOFTW' +
- 'ARE'
- 'EVEN IF OBJECTWARE HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH'
- 'DAMAGES.')
- ReadOnly = True
- TabOrder = 4
- end
- object ButtonInstall: TButton
- Left = 336
- Top = 48
- Width = 89
- Height = 33
- Caption = 'Install'
- Default = True
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- OnClick = ButtonInstallClick
- end
- object ButtonCancel: TButton
- Left = 336
- Top = 88
- Width = 89
- Height = 33
- Caption = '&Cancel'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = ButtonCancelClick
- end
- object ButtonBrowse: TButton
- Left = 296
- Top = 144
- Width = 49
- Height = 21
- Caption = 'Browse'
- TabOrder = 5
- Visible = False
- OnClick = ButtonBrowseClick
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 136
- Top = 168
- Width = 145
- Height = 97
- ItemHeight = 16
- TabOrder = 6
- Visible = False
- OnChange = DirectoryListBox1Change
- OnExit = DirectoryListBox1Exit
- end
- end
- object ProgmanDdeClient: TDdeClientConv
- DdeService = 'PROGMAN'
- DdeTopic = 'PROGMAN'
- ConnectMode = ddeManual
- Left = 392
- LinkInfo = (
- 'Service PROGMAN'
- 'Topic PROGMAN')
- end
- end
-